home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 44 / Amiga Format CD44 (1999-08-26)(Future Publishing)(GB)(Track 1 of 3)[!][issue 1999-10].iso / -in_the_mag- / reader_requests / defender++ / install < prev    next >
Text File  |  1999-07-26  |  590b  |  27 lines
  1.  
  2.  
  3. assign defender: ""
  4.  
  5. echo "Input path you wish to install to (no draw will be created):"
  6. lab lab0
  7. requestfile >env:defpath drawer=SYS: title="Input path" drawersonly
  8.  
  9. requestchoice >env:defchoice "You selected :" $defpath "correct" "no"
  10.  
  11. if $defchoice eq "0"
  12.     skip lab0 back
  13. endif
  14. assign defender: $defpath
  15.  
  16. copy #? defender: all
  17.  
  18. echo >>s:user-startup ""
  19. echo >>s:user-startup ";BEGIN----Defender++----"
  20. echo >>s:user-startup "ASSIGN Defender: " noline
  21. echo >>s:user-startup $defpath
  22. echo >>s:user-startup ";END -----Defender++----"
  23.  
  24. delete >nil: env:defpath
  25.  
  26. delete >nil: env:defchoice
  27.